Transversale Schwingungen 1

Version Stand
02.11.2020
Andreas Jäger

Pendel 2 ein/aus

Stand

Kurve Pendel 1

Kurve Pendel 2

Kurve Pendel 3

t

x

w: 1
t: 0
s0: 3
P0: (0, (s0 * sin(((-w) * t) + (0 * π / 6))))
P1: (1, (s0 * sin(((-w) * t) + π / 6)))
P2: (2, (s0 * sin(((-w) * t) + (2 * π / 6))))
Z01: (P0 + P1) / 2
Z12: (P1 + P2) / 2
F1 = NaN
Liste1 = Sequence((Element[{-0.1, 0.1, -0.1, 0.1, 0}, n + 1], ((y(P0) * (5 - n)) + (5 * n)) / 5), n, 0, 5)
A = Point(Liste1)
B = Point(Liste1)
f = Segment(A, B)
C = Point(Liste1)
g = Segment(B, C)
D = Point(Liste1)
h = Segment(C, D)
i = Segment(D, P0)
Liste2 = Sequence((Element[{0.9, 1.1, 0.9, 1.1, 1}, n + 1], ((y(P1) * (5 - n)) + (5 * n)) / 5), n, 0, 5)
E = Point(Liste2)
F = Point(Liste2)
j = Segment(E, F)
G = Point(Liste2)
k = Segment(F, G)
H = Point(Liste2)
l = Segment(G, H)
m = Segment(H, P1)
I: (0, 5)
J: (1, 5)
K: (2, 5)
L = Point(f)
n = Segment(I, L)
M = Point(j)
p = Segment(J, M)
Liste3 = Sequence((Element[{1.9, 2.1, 1.9, 2.1, 2}, n + 1], ((y(P2) * (5 - n)) + (5 * n)) / 5), n, 0, 5)
N = Point(Liste3)
q = Segment(K, N)
O = Point(Liste3)
r = Segment(N, O)
P = Point(Liste3)
s = Segment(O, P)
Q = Point(Liste3)
a = Segment(P, Q)
b = Segment(Q, P2)
v = Vector(P1, P2)
c = Segment((-0.2, 0), (2.2, 0))
nn: 1
u = Vector(P0, P1)
d = false
br1 = false
br2 = false
br3 = false
r0: 0.5
y0: 6
R1: (t / 5, (r0 * y(P0)) - y0)
R2: (t / 5, (r0 * y(P1)) - y0)
R3: (t / 5, (r0 * y(P2)) - y0)
e = Vector((0, (-y0)), (3, (-y0)))
u_1 = Vector((0, (-y0) - 2.5), (0, (-y0) + 2.5))